home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / libcalls / console.inc < prev    next >
Text File  |  1998-06-24  |  866b  |  39 lines
  1. pattern CDInputHandler(_events,_consoleDevice) is
  2.     push a6;
  3.     safe a0:=_events; a1:=_consoleDevice;;
  4.     a6:=ConsoleDevice; jsr [a6-42];
  5.     pop a6;
  6. endp;                                                            # CDINPUTHANDLER
  7.  
  8. pattern RawKeyConvert(_events,_buffer,_length,_keyMap) is
  9.     push a2\a6;
  10.     safe a0:=_events; a1:=_buffer; d1.l:=_length; a2:=_keyMap;;
  11.     a6:=ConsoleDevice; jsr [a6-48];
  12.     pop a2\a6;
  13. endp;                                                            # RAWKEYCONVERT
  14.  
  15. pattern consolePrivate1 is
  16.     push a6;
  17.     a6:=ConsoleDevice; jsr [a6-54];
  18.     pop a6;
  19. endp;                                                            # CONSOLEPRIVATE1
  20.  
  21. pattern consolePrivate2 is
  22.     push a6;
  23.     a6:=ConsoleDevice; jsr [a6-60];
  24.     pop a6;
  25. endp;                                                            # CONSOLEPRIVATE2
  26.  
  27. pattern consolePrivate3 is
  28.     push a6;
  29.     a6:=ConsoleDevice; jsr [a6-66];
  30.     pop a6;
  31. endp;                                                            # CONSOLEPRIVATE3
  32.  
  33. pattern consolePrivate4 is
  34.     push a6;
  35.     a6:=ConsoleDevice; jsr [a6-72];
  36.     pop a6;
  37. endp;                                                            # CONSOLEPRIVATE4
  38.  
  39.